home *** CD-ROM | disk | FTP | other *** search
- on(keyPress "<Left>"){
- temptar = eval("/:currtar");
- if(eval("/:currtar") == eval("/:currplace"))
- {
- set("/:currtar",eval("/:currtar") - "1");
- }
- else if(eval("/:currplace") < eval("/:currtar"))
- {
- temp = eval("/:currtar");
- set("/:currtar",eval("/:currplace"));
- set("/:currplace",temp);
- }
- if(eval("/:currtar") < "1")
- {
- set("/:currtar","1");
- }
- set("/:tarx",eval("/:tar" add eval("/:currtar")));
- if(temptar != eval("/:currtar"))
- {
- set("/:force",eval("/:force") + "12");
- }
- }
-